%%%-------------------------------------------------------------------
%%% @author mirahs(2892727493@qq.com)
%%% @doc
%%%     加解密相关工具
%%% @end
%%%-------------------------------------------------------------------
-module(util_encrypt).

-export([
    md5/1
    ,md5_caps/1
]).


%%%===================================================================
%%% API functions
%%%===================================================================

%% 生成小写16进制32位md5值
-spec md5(Str) -> Val when
    Str :: string(),
    Val :: bitstring().
md5(Str) ->
    list_to_binary([io_lib:format("~2.16.0b",[N]) || N <- binary_to_list(erlang:md5(Str))]).

%% 生成大写16进制32位md5值
-spec md5_caps(Str) -> Val when
    Str :: string(),
    Val :: bitstring().
md5_caps(Str) ->
    list_to_binary([io_lib:format("~2.16.0B",[N]) || N <- binary_to_list(erlang:md5(Str))]).
